home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / lib / c / stdio / sscanf.c < prev    next >
C/C++ Source or Header  |  1990-09-11  |  3KB  |  109 lines
  1. /* 
  2.  * sscanf.c --
  3.  *
  4.  *    Source code for the "sscanf" library procedure.
  5.  *
  6.  * Copyright 1988 Regents of the University of California
  7.  * Permission to use, copy, modify, and distribute this
  8.  * software and its documentation for any purpose and without
  9.  * fee is hereby granted, provided that the above copyright
  10.  * notice appear in all copies.  The University of California
  11.  * makes no representations about the suitability of this
  12.  * software for any purpose.  It is provided "as is" without
  13.  * express or implied warranty.
  14.  */
  15.  
  16. #ifndef lint
  17. static char rcsid[] = "$Header: /sprite/src/lib/c/stdio/RCS/sscanf.c,v 1.8 90/09/11 14:27:26 kupfer Exp $ SPRITE (Berkeley)";
  18. #endif not lint
  19.  
  20. #include <stdio.h>
  21. #include <string.h>
  22. #include <varargs.h>
  23. #include <cfuncproto.h>
  24.  
  25. #ifndef lint
  26.  
  27. /* 
  28.  * Forward declarations:
  29.  */
  30. static void StringReadProc _ARGS_((FILE *stream));
  31.  
  32.  
  33. /*
  34.  *----------------------------------------------------------------------
  35.  *
  36.  * StringReadProc --
  37.  *
  38.  *    This procedure is invoked when an attempt is made to read
  39.  *    past the end of a string.  It returns an end-of-file
  40.  *    condition.
  41.  *
  42.  * Results:
  43.  *    None.
  44.  *
  45.  * Side effects:
  46.  *    The stream is marked with an end-of-file condition.
  47.  *
  48.  *----------------------------------------------------------------------
  49.  */
  50.  
  51. static void
  52. StringReadProc(stream)
  53.     register FILE *stream;
  54. {
  55.     stream->readCount = 0;
  56.     stream->flags |= STDIO_EOF;
  57. }
  58.  
  59. /*
  60.  *----------------------------------------------------------------------
  61.  *
  62.  * sscanf --
  63.  *
  64.  *    Same as scanf, except take input from a string rather than
  65.  *    an I/O stream.
  66.  *
  67.  * Results:
  68.  *    The values indicated by va_alist are modified to hold
  69.  *    information scanned from string.  The return value is the
  70.  *    number of fields successfully scanned, or EOF if the string
  71.  *    is empty.
  72.  *
  73.  * Side effects:
  74.  *    None.
  75.  *
  76.  *----------------------------------------------------------------------
  77.  */
  78.  
  79. int
  80. sscanf(va_alist)
  81.     va_dcl            /* char *string, then char *format, then any
  82.                  * number of pointers to values to be scanned
  83.                  * from string under control of format. */
  84. {
  85.     char *string;
  86.     char *format;
  87.     FILE stream;
  88.     va_list args;
  89.  
  90.     va_start(args);
  91.     string = va_arg(args, char *);
  92.     format = va_arg(args, char *);
  93.     Stdio_Setup(&stream, 1, 0, (unsigned char *)string, strlen(string),
  94.         StringReadProc, (void (*)()) 0, (int (*)()) 0, (ClientData) 0);
  95.     stream.readCount = strlen(string);
  96.     return vfscanf(&stream, format, args);
  97. }
  98. #else
  99. /* VARARGS2 */
  100. /* ARGSUSED */
  101. int
  102. sscanf(string, format)
  103.     char *string;
  104.     char *format;
  105. {
  106.     return 0;
  107. }
  108. #endif lint
  109.